;;make sure vl- functions work
 (vl-load-com)
 ;;get the acad application
 (setq acad (vlax-get-acad-object))
 ;;get the application preferences,
 (setq prefs (vla-get-preferences acad))
 ;;prefs object has the following properties which give access to the tabs in the Options Dialog:
	;   Application (RO) = #<VLA-OBJECT IAcadApplication 000000013fc43318>
	;   Display (RO) = #<VLA-OBJECT IAcadPreferencesDisplay 000000005bc78f28>
	;   Drafting (RO) = #<VLA-OBJECT IAcadPreferencesDrafting 000000005bc78f20>
	;   Files (RO) = #<VLA-OBJECT IAcadPreferencesFiles 000000005bc78f30>
	;   OpenSave (RO) = #<VLA-OBJECT IAcadPreferencesOpenSave 000000005bc78f38>
	;   Output (RO) = #<VLA-OBJECT IAcadPreferencesOutput 000000005bc78f40>
	;   Profiles (RO) = #<VLA-OBJECT IAcadPreferencesProfiles 000000005bc78f48>
	;   Selection (RO) = #<VLA-OBJECT IAcadPreferencesSelection 000000005bc78f50>
	;   System (RO) = #<VLA-OBJECT IAcadPreferencesSystem 000000005bc78f58>
	;   User (RO) = #<VLA-OBJECT IAcadPreferencesUser 000000005bc78f60>
 (setq f_prefs (vla-get-files prefs))
 ;;get output preferences
 (setq o_prefs (vla-get-output prefs))
 ;;get individual preferences
 
 (setq PrinterConfigPath (vla-get-PrinterConfigPath f_prefs))
 (setq PrinterDescPath (vla-get-PrinterDescPath f_prefs))
 (setq PrinterStyleSheetPath (vla-get-PrinterStyleSheetPath f_prefs))
 (setq PrintFile (vla-get-PrintFile f_prefs))
 (setq SupportPath (vla-get-SupportPath f_prefs))
 (setq defaultpath (vla-get-DefaultPlotToFilePath o_prefs))
 